(set-language-info-alist): Add korean-cp949, cp949 to spec.

diff --git a/lisp/language/korean.el b/lisp/language/korean.el
index e8e78bfc47bab53f2760e24165c409275f5ad3f6..07382dff1daa18f4c9d319a9ef46cf0d8b31863c 100644 (file)
--- a/lisp/language/korean.el
+++ b/lisp/language/korean.el
@@ -70,11 +70,11 @@
            (exit-function . exit-korean-environment)
            (iso639-language . ko)
            (tutorial . "TUTORIAL.ko")
-           (charset korean-ksc5601)
-           (coding-system iso-2022-kr korean-iso-8bit)
+           (charset korean-ksc5601 cp949)
+           (coding-system iso-2022-kr korean-iso-8bit korean-cp949)
            (input-method . "korean-hangul")
            (features korea-util)
-           (coding-priority korean-iso-8bit iso-2022-kr)
+           (coding-priority korean-iso-8bit korean-cp949 iso-2022-kr)
            (sample-text . "Hangul (\e$(CGQ1[\e(B)        \e$(C>H3gGO<<?d\e(B, \e$(C>H3gGO=J4O1n\e(B")
            (documentation . "\
 The following key bindings are available for controlling Korean input methods: